VXD

Otázka od: Števlík Marián

27. 11. 2002 9:06

Hi all,
Mam CPP zdrojak, kt. potrebujem prepisat do Delphi
Narazil som tam na volanie funkcie z VXD
Ako je mozne taketo volanie urobit v Delphi? (je to obdobne ako DLL?)

....
// 1. Try to load the VxD
   VxDHandle = CreateFile ("\\\\.\\IDE21201.VXD", 0, 0, 0, 0,
FILE_FLAG_DELETE_ON_CLOSE, 0);

   if (VxDHandle != INVALID_HANDLE_VALUE)
   {
         // 2. Run VxD function
      DeviceIoControl (VxDHandle, m_cVxDFunctionIdesDInfo,
     0, 0, pOutBufVxD,
sizeof(pt_IdeDInfo), &lpBytesReturned, 0);

         // 3. Unload VxD
      CloseHandle (VxDHandle);
   }
   else
  MessageBox (NULL, "ERROR: Could not open IDE21201.VXD file",

     TITLE, MB_ICONSTOP);
....

Stevlik Marian
Software Development Specialist
MERLIN
Stefanikova 32
150 00 Prague 5
Czech Republic
e-mail: marian.stevlik@merlin.cz
tel: +420 241010111 (181)
fax: +420 241010165
ICQ: 38493645

Odpovedá: Dalibor Toman

27. 11. 2002 9:36

> Hi all,
> Mam CPP zdrojak, kt. potrebujem prepisat do Delphi
> Narazil som tam na volanie funkcie z VXD

> Ako je mozne taketo volanie urobit v Delphi? (je to obdobne ako
DLL?)

?? je to uplne stejne jako v CCku. Pouze se zmeni syntaxe a v pripade,
ze narazis na nejakou nedefinovanou konstantu tak si ji musis sporavne
nadefinovat sam.

> ....
> // 1. Try to load the VxD
> VxDHandle = CreateFile ("\\\\.\\IDE21201.VXD", 0, 0, 0, 0,
> FILE_FLAG_DELETE_ON_CLOSE, 0);
..
..

D. Toman